home *** CD-ROM | disk | FTP | other *** search
/ Mac Magazin/MacEasy 19 / Mac Magazin and MacEasy Magazine CD - Issue 19.iso / Grafik & Text & Film / Quark XTensions / Freeware Xtensions / Scripts folder / Scripts / Guides • Toggle Lock⁄UnLockTEXT < prev    next >
Text File  |  1994-04-11  |  379b  |  16 lines
  1. tell application "QuarkXPress®"
  2.     activate
  3.     try
  4.         if exists document 1 then
  5.             if lock guides of document 1 is true then
  6.                 set lock guides of document 1 to false
  7.             else
  8.                 set lock guides of document 1 to true
  9.             end if
  10.         else
  11.             beep
  12.             display dialog "There is no document currently open!" buttons {"Ooops!"} default button 1 with icon 0
  13.         end if
  14.     on error
  15.     end try
  16. end tell